home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1993 June / 1993-06.d64 / ia slide show (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  2KB  |  32 lines
  1. 10 data160,32,132,251,132,253,160,1,132,252,136,132,250,162,199,134,166,162,39
  2. 20 data134,167,132,169,177,250,133,168,165,167,240,4,160,8,177,250,10,38,168,42
  3. 30 data38,168,42,41,3,133,170,160,4,169,0,38,168,42,38,168,42,72,101,170,101
  4. 40 data169,170,165,170,133,169,104,133,170,189,0,23,6,254,6,254,5,254,133,254
  5. 50 data136,208,221,145,252,24,198,167,16,40,162,2,181,250,41,7,201,7,240,15,56
  6. 60 data181,250,233,55,149,250,181,251,233,1,149,251,208,6,246,250,208,2,246,251
  7. 70 data202,202,240,223,198,166,208,144,96,162,2,181,250,105,8,149,250,144,3,246
  8. 80 data251,24,202,202,240,241,76,172,23,27,65,8,13,10,27,75,64,1,0,165,197,201
  9. 90 data64,208,219,76,35,23,160,32,132,251,160,0,132,250,160,25,132,252,160,0
  10. 100 data185,162,23,32,210,255,200,192,9,208,245,160,40,132,253,160,7,177,250
  11. 110 data162,7,42,118,166,202,16,250,136,16,243,169,7,170,56,101,250,133,250,144
  12. 120 data2,230,251,181,166,32,210,255,202,16,248,198,253,208,217,198,252,208,196
  13. 130 data96,173,58,3,160,0,153,0,4,153,251,4,153,245,5,153,239,6,200,192,251,208
  14. 140 data239,96,173,59,3,160,0,153,0,216,153,251,216,153,245,217,153,239,218,200
  15. 150 data192,251,208,239,96,169,8,13,24,208,141,24,208,169,32,13,17,208,141,17
  16. 160 data208,169,63,133,216,169,0,133,215,168,145,215,160,63,162,32,145,215,136
  17. 170 data208,251,198,216,202,208,246,169,4,133,232,169,0,133,231,168,173,52,3
  18. 180 data162,4,145,231,200,208,251,230,232,202,208,246,96
  19. 190 w=8192:e=8:v=53265:pokev+15,6:dimj(39)
  20. 200 print"[147]"tab(10)"please wait 3 sec.
  21. 210 s[178]5900:[129]i[178]s[164]s[170]241:[135]a:[151]i,a:[130]
  22. 220 t[178]828:[129]i[178]t[164]t[170]45:[135]a:[151]i,a:[130]
  23. 230 u[178]36906:[129]i[178]u[164]u[170]65:[135]a:[151]i,a:[130]
  24. 240 [153]""[163]10);:[133]"no. of slides";ns:[158]u
  25. 250 [151]v,59:[151]v[170]5,216:[151]v[170]7,24
  26. 260 [129]n[178]1[164]ns:[159]3,8,0,"a"[170][196](n)
  27. 270 [129]i[178]0[164]39:[132]3,j(i):[130]:[132]3,ch:[132]3,co:[132]3,g
  28. 280 [132]3,q$:[160]3:[158]u:[151]826,ch:[158]t:[151]827,co:[158]851
  29. 290 [151]v[170]15,g:[151]v[170]16,g:[129]i[178]1[164]10:[151]5887[170]i,[197]([202](q$,i,1)):[130]
  30. 300 [129]i[178]0[164]39:[151]w[170]i[172]e,j(i):[130]:[158]s:[130]
  31. 310 [137]310
  32.